inherited frmRel_FornecedorXProdutos: TfrmRel_FornecedorXProdutos
  Left = 258
  Top = 103
  Caption = 'Relat'#243'rio de Fornecedores x Produtos'
  ClientHeight = 397
  ClientWidth = 589
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 589
    Height = 224
    object Label11: TLabel
      Left = 39
      Top = 118
      Width = 164
      Height = 14
      Caption = 'Relacionar os C'#243'digos Fiscais'
      Font.Charset = ANSI_CHARSET
      Font.Color = clActiveCaption
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object BtnInsereCFiscal: TSpeedButton
      Left = 9
      Top = 116
      Width = 25
      Height = 18
      Hint = 'Insere um novo hist'#243'rico na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtnInsereCFiscalClick
    end
    object Label1: TLabel
      Left = 7
      Top = 7
      Width = 64
      Height = 14
      Caption = 'Fornecedor'
    end
    object BtnC_ForI: TSpeedButton
      Left = 129
      Top = 5
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = BtnC_ForIClick
    end
    object Label2: TLabel
      Left = 7
      Top = 35
      Width = 64
      Height = 14
      Caption = 'Fornecedor'
    end
    object BtnC_ForF: TSpeedButton
      Left = 129
      Top = 33
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = BtnC_ForFClick
    end
    object p_tipoRel: TRadioGroup
      Left = 467
      Top = 60
      Width = 115
      Height = 53
      Caption = 'Tipo de Relat'#243'rio:'
      ItemIndex = 0
      Items.Strings = (
        'Anal'#237'tico'
        'Sint'#233'tico')
      TabOrder = 3
    end
    object GroupBox1: TGroupBox
      Left = 8
      Top = 60
      Width = 449
      Height = 53
      Caption = 'Per'#237'odo'
      TabOrder = 2
      object Label3: TLabel
        Left = 38
        Top = 22
        Width = 57
        Height = 14
        Caption = 'Data Inicial'
      end
      object Label5: TLabel
        Left = 244
        Top = 22
        Width = 51
        Height = 14
        Caption = 'Data Final'
      end
      object ed_dataini: TDateEdit
        Left = 105
        Top = 20
        Width = 106
        Height = 21
        Ctl3D = False
        NumGlyphs = 2
        ParentCtl3D = False
        TabOrder = 0
        OnKeyDown = ed_datainiKeyDown
      end
      object ed_datafim: TDateEdit
        Left = 305
        Top = 20
        Width = 106
        Height = 21
        Ctl3D = False
        NumGlyphs = 2
        ParentCtl3D = False
        TabOrder = 1
        OnKeyDown = ed_datafimKeyDown
      end
    end
    object ListaCFiscal: TCheckListBox
      Left = 8
      Top = 136
      Width = 573
      Height = 82
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 4
      OnKeyDown = ListaCFiscalKeyDown
    end
    object edForI: TEdit
      Left = 75
      Top = 5
      Width = 46
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      MaxLength = 5
      TabOrder = 0
      OnEnter = edForIEnter
      OnExit = edForIExit
      OnKeyDown = edForIKeyDown
      OnKeyPress = edForIKeyPress
    end
    object pForI: TPanel
      Left = 156
      Top = 5
      Width = 425
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      TabOrder = 6
    end
    object edForF: TEdit
      Left = 75
      Top = 33
      Width = 46
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      MaxLength = 5
      TabOrder = 1
      OnEnter = edForFEnter
      OnExit = edForFExit
      OnKeyDown = edForFKeyDown
      OnKeyPress = edForFKeyPress
    end
    object pForF: TPanel
      Left = 156
      Top = 33
      Width = 425
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      TabOrder = 7
    end
    object pnlCF: TPanel
      Left = 564
      Top = 6
      Width = 449
      Height = 213
      BevelInner = bvLowered
      BorderWidth = 1
      Color = clGray
      TabOrder = 5
      Visible = False
      object Label8: TLabel
        Left = 8
        Top = 12
        Width = 123
        Height = 19
        Caption = 'C'#243'digos Fiscais'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -16
        Font.Name = 'Arial'
        Font.Style = [fsBold, fsUnderline]
        ParentFont = False
      end
      object dbgrdCF: TDBGrid
        Left = 3
        Top = 39
        Width = 443
        Height = 171
        Align = alBottom
        DataSource = dtsrc
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        OnDblClick = dbgrdCFDblClick
        OnKeyDown = dbgrdCFKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'Cod'
            Title.Caption = 'C'#243'digo'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Descr'
            Title.Caption = 'Descri'#231#227'o'
            Width = 333
            Visible = True
          end>
      end
      object grpBusca: TGroupBox
        Left = 8
        Top = 144
        Width = 433
        Height = 57
        Caption = ' Informe a Descri'#231#227'o '
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        Visible = False
        object Label9: TLabel
          Left = 200
          Top = 40
          Width = 229
          Height = 14
          Caption = ' Tecle <F5> p/ localizar por C'#243'd. ou Descr. '
          Font.Charset = ANSI_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object edNome: TEdit
          Left = 8
          Top = 16
          Width = 417
          Height = 22
          CharCase = ecUpperCase
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnKeyDown = edNomeKeyDown
        end
      end
      object Panel6: TPanel
        Left = 227
        Top = 44
        Width = 185
        Height = 14
        Alignment = taRightJustify
        BevelOuter = bvNone
        Caption = '<F2> p/ localizar'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object BitBtn1: TBitBtn
        Left = 364
        Top = 10
        Width = 75
        Height = 25
        Caption = '&Fechar'
        TabOrder = 3
        OnClick = BitBtn1Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777788
          F8F878F7777777777333333F00004444400777FFF444447777777777F333FF7F
          000033334D5008FFF4333377777777773337777F0000333345D50FFFF4333333
          337F777F3337F33F000033334D5D0FFFF43333333377877F3337F33F00003333
          45D50FEFE4333333337F787F3337F33F000033334D5D0FFFF43333333377877F
          3337F33F0000333345D50FEFE4333333337F787F3337F33F000033334D5D0FFF
          F43333333377877F3337F33F0000333345D50FEFE4333333337F787F3337F33F
          000033334D5D0EFEF43333333377877F3337F33F0000333345D50FEFE4333333
          337F787F3337F33F000033334D5D0EFEF43333333377877F3337F33F00003333
          4444444444333333337F7F7FFFF7F33F00003333333333333333333333777777
          7777333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333777777F3333F00003333330000003333333333337FFFF7F3333F
          0000}
        NumGlyphs = 2
      end
    end
  end
  inherited Panel2: TPanel
    Top = 330
    Width = 589
    inherited btncancelar1: TBitBtn
      Left = 255
    end
    inherited btnfechar1: TBitBtn
      Left = 476
    end
    inherited bimprimir: TFlatButton
      Enabled = True
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      Left = 238
      OnClick = btncancelarClick
    end
    inherited btnfechar: TFlatButton
      Left = 468
    end
  end
  inherited sb: TStatusBar
    Top = 378
    Width = 589
  end
  inherited Panel3: TPanel
    Width = 589
    inherited ListaEmp: TCheckListBox
      Width = 573
    end
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 52
    Top = 76
    object CDSCod: TStringField
      FieldName = 'Cod'
      Size = 10
    end
    object CDSDescr: TStringField
      FieldName = 'Descr'
      Size = 40
    end
  end
  object dtsrc: TDataSource
    DataSet = CDS
    Left = 16
    Top = 76
  end
  object TAB: TRxMemoryData
    FieldDefs = <>
    Left = 308
    Top = 147
    object TABCodFor: TStringField
      FieldName = 'CodFor'
      Size = 5
    end
    object TABNome: TStringField
      FieldName = 'Nome'
      Size = 40
    end
    object TABData: TDateField
      FieldName = 'Data'
    end
    object TABNota: TStringField
      FieldName = 'Nota'
      Size = 9
    end
    object TABSerie: TStringField
      FieldName = 'Serie'
      Size = 2
    end
    object TABCodProd: TStringField
      FieldName = 'CodProd'
      Size = 15
    end
    object TABNomeProd: TStringField
      FieldName = 'NomeProd'
      Size = 40
    end
    object TABQtde: TFloatField
      FieldName = 'Qtde'
    end
    object TABVlrUnit: TFloatField
      FieldName = 'VlrUnit'
      DisplayFormat = '0.0000'
    end
    object TABVlrTot: TFloatField
      FieldName = 'VlrTot'
      DisplayFormat = '0.0000'
    end
    object TABCFOP: TStringField
      FieldName = 'CFOP'
      Size = 5
    end
    object TABHistorico: TStringField
      FieldName = 'Historico'
    end
    object TABFreteConhecimento: TFloatField
      FieldName = 'FreteConhecimento'
    end
    object TABIpi: TFloatField
      FieldName = 'Ipi'
    end
    object TABRegra: TStringField
      DisplayWidth = 35
      FieldName = 'Regra'
      Size = 35
    end
  end
end
